4 IFPEEK(56)<>144THENPOKE56,144:POKE55,0:RUN
5 DV=PEEK(186):IFDV<8THENDV=8
6 GOSUB61000
7 SYS57812"TOOLS CA00",DV,0:POKE780,0:POKE781,0:POKE782,202:SYS65493
8 BL=51760:SYSBL,"IMAGE WRITER.R",DV,39436
9 SYSBL,"AIRPORT1.ML",DV,49152
10 SYSBL,"AIRPORT.SCR",DV,36876
11 SYSBL,"AIRPORT.SPR",DV,8192
12 SYSBL,"AIRPORT.HLP",DV,40960
30 PRINT"[144]L[207]"CHR$(34)"AIRPORT.BAS"CHR$(34)","DV
40 PRINT"RUN":POKE631,13:POKE632,13:POKE198,2
50 POKE44,34:POKE43,1:POKE34*256,0:END
59999 END
60000 OPEN15,8,15,"S0:AIRPORT '93":CLOSE15:SAVE"0:AIRPORT '93",8:END
61000 POKE53280,0:POKE53265,11:POKE53281,0:POKE53272,22
61001 PRINT"[147]":Z$=" [152]                                      ":POKE214,10:PRINT
61010 PRINT" [155][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184]":FORI=0TO11:PRINTZ$:NEXT
61020 PRINT" [151][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][152]"
61030 Z$(0)="[193] [201] [210] [208] [207] [210] [212]   ' 9 4":Z$(1)="BY [196]AVID [205]. [205]OORMAN"
61040 Z$(2)="[214]3.2 ([195]) 1994 BY [211]OFTDISK, [201]NC."+CHR$(13)
61050 Z$(3)="[212]HIS PROGRAM IS THE COPYRIGHTED WORK
61060 Z$(4)[178]"OF (null)(null)ASC(null)STR$RIGHT$(null)(null) (null)(null)PEEK(null)RIGHT$(null)LEFT$RIGHT$(null)CHR$.  RIGHT$T IS NOT"
61070 Z$(5)[178]"SHAREWARE OR IN THE PUBLIC DOMAIN."
61080 Z$(6)[178]"(null)EPORT ILLEGAL DISTRIBUTION OF":Z$(7)[178]"THIS PROGRAM BY CALLING"
61090 Z$(8)[178]"1-800-831-2694 OR 1-318-221-8718.":[151]214,12:[153]
61100 [129]I[178]0[164]8:[153][163]20[171]([195](Z$(I))[173]2))""Z$(I):[130]:[151]53265,27:[142]